load the data manipulation libraries

load in the data

trend

split(crimes, f = as.factor(crimes$Survey.year))
$`2001`

$`2002`

$`2003`

$`2004`

$`2005`

$`2006`

$`2007`

$`2008`

$`2009`

$`2010`

$`2011`

$`2012`

$`2013`

$`2014`
NA
LS0tCnRpdGxlOiAiUiBOb3RlYm9vayIKb3V0cHV0OiBodG1sX25vdGVib29rCi0tLQojI2xvYWQgdGhlIGRhdGEgbWFuaXB1bGF0aW9uIGxpYnJhcmllcwpgYGB7cn0KCmBgYAoKIyNsb2FkIGluIHRoZSBkYXRhCmBgYHtyfQpjcmltZXMgPC0gcmVhZC5jc3YoIi4uL2RhdGEvT1BFIENTUyBDdXN0b20gRGF0YSAyMDE3LTAyLTEyIDEzNDg1Ni9DcmltaW5hbF9PZmZlbnNlc19Pbl9jYW1wdXMuY3N2IikKZm9yKGkgaW4gNjoxOSl7CiAgYXMubnVtZXJpYyhjcmltZXNbLGldKQp9ICNjb252ZXJ0IGludGVnZXIgdG8gbnVtYmVyaWMKYGBgCgojI3RyZW5kCmBgYHtyfQpjcmltZXMkdG90YWwgPC0gcm93U3VtcyhjcmltZXNbLC1jKDE6NildLG5hLnJtID0gVFJVRSkgI3N1bSBvZiBhbGwgdHlwZXMgb2YgY3JpbWVzIGZvciBlYWNoIGluc3RpdHV0aW9uCmNyaW1lcy5zcGxpdCA8LSBzcGxpdChjcmltZXMsIGYgPSBhcy5mYWN0b3IoY3JpbWVzJFN1cnZleS55ZWFyKSkKeWVhci5zdW0gPC0gTkEKZm9yKGkgaW4gMTogbGVuZ3RoKGNyaW1lcy5zcGxpdCkpewogeWVhci5zdW1baV0gPC0gc3VtKGNyaW1lcy5zcGxpdFtbaV1dJHRvdGFsKSAKfSAjY2FsY3VsYXRlIHRvdGFsIGNyaW1lcyBvZiBldmVyeSB5ZWFyCmBgYA==